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ECTION I 



PART 1 



Definition of 
the Master 
Tape, the 
Editor Deck, 
and the System 
Tape 



The 704 FORTRAN II System Tape 

Initial Receipt of the 704 FORTRAN II System 

A. Part of the 704 FORTRAN II System distributed by IBM consists 
of*a Master tape and tv/o Editor decks. The Master tape contains 
both the 4K and the 8K version of the 704 FORTRAN II executive 
system. The 4K Editor deck is to be used by a 4K machine in- 
, stallation; the 8K Editor deck is for a 8K machine installation. 
The Master tape is "NOT a running tape, and is NOT to bemused 
for object program compilation. 

The complete 704 FORTRAN IT Editor deck (either the 4K or the 
8K version), consists of the following programs and subroutines, 
and is distributed along with FORTRAN II to enable installations 
to maintain a current and up-to-date System tape for object pro- 
gram compilation. Complete descriptions of the individual pro- 
grams and subroutines are found later in this Manual. 

Composition of the Editor Deck: 

FNEDT2 - FORTRAN II Editing Program 

Control and Binary Correction cards 

PLIB2 - FORTRAN II Permanent Librarian 

Permanent Library cards 

GLIB2 - FORTRAJM II General Librarian 

General Library cards 

FNDE2 - FORTRAN II General Diagnostic Editing Program 

The proper Editor deck, 4K or 8K, in conjunction with the 
Master tape, produces the 704 FORTRAN II System tape. The 
System tape, and only the System tape, is to be used for compi- 
ling object programs. 



Master Tape 
Duplicating 
Program - 
F2TCVP 



B. F2TCVP, the Master Tape Duplicating Program, is included 

with FORTRAN II. It is advisable, for safety purposes, to copy 
the Master tape onto additional tapes using F2TCVP. These 
copies are then used for generating a new System tape. The 
original Master tape furnished with FORTRAN II should be kept 
in a secure place. F2TCVP executes a checksum verification of 
all records duplicated from the Master tape onto the copy tape. 
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,mw Operating 
^f\ Instructions 

,f«f F2TCVP 



C* F2TCVP is executed in the following manner: 

'1. Mount the Master tape as logical tape 5. 

2. Mount the copy tape as logical tape 1. 

3. Ready F2TCVP in the card reader. 

4. Press LOAD CARD button. 

5. Correct FINAL STOP: 320g, indicates the tape duplication 
completed. 

6. File-protect the duplicated tape. 



Error Halts 
in F2TCVP 



D. Error Halts in F2TCVP are as follows: 
Halt (octal): Reason for Halt : 



lsfc< 



40 



43 



56 



62 



64 



70 



77 



102 



107 



112 



Either Tape 5 in- 
correctly written 
or machine error. 

RTT error reading 
tape 5. 

False EOF, Machine 
error. 

Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as for 62. 

RTT error reading 
back tape 1 record. 

False EOR skip. 
Machine error . 

False EOF skip. 
Machine error . 

Checksum error 
reading Tape 5 

record. 

RTT error reading 
tape 5 record. 



Procedure 
Restart entire program. 

Press START to try again. 
Restart entire program. 
Press START to try again^ 

Press START to try again. 
Press START to try again. 

Restart entire program . 

Restart entire program. 



Press START to reread 
and recheck tape 5 
record. 

Press START to try again 
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Halt (octal): 
130 

134 
136 
142 



146 



160 



173 



200 



205 



210 



226 



232 



234 



Reason for Halt: 

;: »-i ' "«i" U p ' ill i ll » ■— — WWWPMI H iI W i i —I I llH n l . W H , 

False EOF. 
Machine error. 

Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as 134 



RTT error reading' 
back tape 1 record. 

RTT otop after 
having encountered 
tape 5 file tape 
marks (file 1). 

Same as 146 (file 2 ) 



False EOR skips. 
Machine error. 

False EOF skip. 
Machine error. 

Check sum error 
after reading tape 1 
record (file 1). 

RTT error after 
reading Tape 1 re- 
cord (file 3). 



Procedure: 



Restart entire program. 



Press START to reread 
and recheck tape 1 
record. 

Press START to reread 
and recheck tape 1 
record. 

Press START to *ry 
again. 

Press START to recheck 
tape mark. 



Press START to recheck 
tape mark. 

Restart entire program. 



Restart entire program. 
Press START to try agai 



Press START to try 
again. 



False EOF. Machine Re start entire program, 
error. 



Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as 232 



Press START to reread 
and recheck tape 1 
record. 

Press START to reread 
and recheck tape 1 
record. 
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Halt (oct« 

■ « ■■ * 

240 



244 



256 



274 



Reason for Halt: 



Procedure: 



RTT error reading Press START to try 

back Tape 1 record again, 

(file 3). 

RTT stop after having Press START to recheck 
encountered tape 5 tape mark, 

file mark (file 3). 

RTT error reading 
Tape 1 record 
(file 4). 



■ ; 



Press START to try again. 



False EOF. Machine Restart entire program, 
error. 
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300 



Press. START to try again. 



302 
306 

312 

320 
321 

330 
346 

366 



Press START to try again.' 
Press START to try again. 



Press START to recheck 
tape mark. 



Tape 1 record word 
fails to agree with 
tape 5 record word 
(file 4). 

Same as 300. 

RTT error after 
reading back tape 
1 record (file 4). 

RTT stop after en- 
countering tape 1 
(4th file) tape mark. 

FINAL STOP. 



Incomplete 1st record Press START to try 
of 1st file written on again. 
tape 1 . 

Incomplete 1st & 
2nd file record 
written on tape 1. 

Incomplete 3rd file 

record written on 
tape 1. 

Incomplete 4th file 

record written oii 
tape 1, .;.^ ; , 



Press START to try aga v in 



Press START to try again. 



P res STAB.T, to try again . 
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PART 2 

General 

Description 
of the Editor 
Program - 
FNEDT? 



Creating and Update- the 704 FORTRAN II System -Tape 

A, The purpose of the FORTRAN II Editor Program, FNEDT2, is ..', 
1 to produce the first two files of a. new, up-to-date FORI RAX II 
System tape from a Master tape and the Editor dock, which con- 
tains ail corrections, insertions, and deletions to - the Master .-..■' 
tape. From the control cards and the binary information cards 
which follow it in the Editor deck, FNEDT2, in conjunction' with 
the Master tape, generates these first two files of a new FOR- 
TRAN II System tape embodying the latest changes to the System, 
The third and fourth files of the FORTRAN XI System tape are 
produced by other sections of the Editor deck, namely P.LIB2 
and FNDE2, which are^de scribed later in this Manual. 
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Arrangement 
of Records on 
the Master 

Tape 



B. The FORTRAN II Master tape consists of four files. 

Files 1 and 2 contain the executive routine or the system, proper. 
There is a special first record, 1-CS, and 10 ordinary system 
records in the first file. There are 115 ordinary system records 
in the second file. The End of File Mark is not considered to be 
an ordinary system record. The first word of each system re- 
cord, except in 1-CS, is a checksum for that record. The second 
word is a control word containing a LOAD ADDRESS {\\\z first 
location into which the first word of the record is to be stored} 
in the address portion and the TRANSFER ADDRESS (the address 
to which control is to.be transferred after the record has been 
completely read in) in the decrement portion. 

File 3 contains the permanent and the general library. The per- 
manent library consists of input-output and expontential sub- 
routines utilized by the FORTRAN II executive system only. The 
general library contains mathematical subroutines distributed 
with FORTRAN II. The first record of a library routine, 
whether permanent or general, edntains the control information 
required by the system proper for that routine. The succeeding 
records of a routine contain the routine in relocatable binary form 

File 4 consists of the FORTRAN II general diagnostic error 
comments. Each comment corresponds to a particular TSX 'in- 
struction in the records of files 1 and 2, and is contained In a 
separate record of file 4. The first word of a record in file 4 
is the record number. The succeeding words in the record con- 
tain the error comment. 



NOTE; The first record, 1-CS, is special Only in the fact that 
■it does not contain the same lojefia&t as the ordinary 

system records. >•, : ,., : ; ; ,, , ■",,>...'•- : ? 
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C« There is a Master Record card in thv Editor deck.^: 
" "'/.lor each ordinary system record o£. files 1 aj$d;2 on 
on the Master tape. The information contained 
the; Master Record card is summarized in the 
following chart, columns 1-5. 
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Types of 



1. FNEDT2 will recognize 4 types of control cards in addition 
to the binary information card (program card) which can 
follow it in the Editor deck. The following table lists these 
5 types of cards along with each card ! s format. 






Type of Card 



Master Record 



9L 
Pref. 



9L 
Oecre. 



Addr. 



9R | 8L 8L 

Deere. Addr. 



Check 

Sum 



Octal 
Entry 
Point 



8R 8R 

Deere. Addr. 



Octal 
First 
Loc. 



Octal 
Last 
Loc. 



New Record 



Program 



Octal no . 
of words 
loaded 



Octal loc. 
first word 
loaded 



Check 
Sum 



Octal 



Octal 



Sum 



b 



Entry First 
Point! Loc. 



\ 



Check IFirst word 



t 



Octal 
Last 
Loc. 



Second word 



Binary corr. j Binary cor r. 
info. 1 ■ info. 



. End File 



Check 

■ Sum — 



End 



Check 
Sum 



16 



rt 



;«»U-.'" : . rh. 



^>LIB2 will recognize the following listed cards which can follow it in the Editor deck: 

a. Control card for the library routine. See PART in, Section D for description of 
the format of the control card for a general library subroutine. The format of the 
control card for both a permanent and a general library subroutine is the same. 

b. Relocatable binary cards comprising the library routine. 

c. A blank card, FNDE2000, which signals PLIB2 to execute a Load-Button sequence 
to load in FNDE2. 

NOTE- The General Librarian Program, GLIB2, is skipped over by PLIB2 during 
a System tape generation. GLIB2 is completely described in PART III. 

FNDE2 will recognize 3 types of cards which can follow it in the Editor deck. The 
following table lists these 3 types of cards along with each card's format. 



Type of Card 



Diagnostic 
Master Record 



Diagnostic 



9L 



9L 



Pref Deere. 



Word 
Count 



9L 
Addr. 



9R 



4~ 



Number of t Check 
Diagnostic j Sum 
Record 
(in Octal) 



8L 
Deere. 



First 
Addr. 



8L 
Addr . 



i 

lOctal No. 
of words 
loaded 



— 



| Diagnostic End J 



4 



Octal loc . i Check 
first word | Sum 
loaded > 

'■ -" T 







i 

} 
.—.,,4. 



■v-r*.*""* * * 



Last 
Addr 



» 



First word 
Binary corr. 
info. 











8R 
Deere, 



8R 
Addr. 



r * "■■' 

j Second word 
j Binary corr. 
J info. 

» 

i .o 

j 
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Illegal Card 
Sequence 



NOTE: The program card (binary information card) of both 
FNEDT2 and FNDE2 is the type of binary card loaded by NYBLI. 
The check sum in 9R in the card included all words punched in the 
card including 9L but excluding 9R. NYBLI is a SHARE Library 
one card loader which loads absolute binary cards. A write-up of 
NYBLI may be obtained from the SHARE Distribution Agency. 

2. The following card sequences in the Editor deck are illegal 
and will cause a lQ7g stop in FNEDT2: 

a. End card followed by any other type of card, except PLIB2000. 

b. End File card followed by an End File card. 

c. End Hie card followed by a Program card. 

d. New Record card followed by any card except a Program card. 



FORTRAN II 
Permanent 
Librarian 
Program - 
PLIB2 



D. The third file of the FORTRAN II System tape, consisting of the 
permanent followed by the general library, is produced by the 
section of the Editor deck named PLIB2, the FORTRAN II 
Permanent Librarian Program. After generating the first two 
files, FNEDT2, passes control to PLIB2. PLIB2 reads the 
permanent library from the card reader and writes it onto the 
System tape. When it encounters the program cards of GLIB2, 
FORTRAN II General Librarian, it skips over these cards, 
reads the general library from the card reader and writes it 
onto the System tape. The reason for GLIB2 being in the 
Editor deck is explained later in this Manual. PLIB2 then 
passes control to the General Diagnostic Editing Program, 
FNDE2. 



FORTRAN II 
General Diag 
no stic Editor 
FNDE2 



The FORTRAN II General Diagnostic Editor Program, FNDE2, 
is the last section of the Editor deck. Its purpose is to read 
the FORTRAN II General Diagnostic file from the Master tape 
and write it onto the new System tape. 



Maintenance 
of the Editor 
Deck 



Maintenance of the FORTRAN II Editor deck will be by binary 
cards, distributed by the IBM FORTRAN Maintenance group, 
for corrections and changes to the System. Memorandums 
accompanying these change or correction cards will indicate 
where the cards are to be incorporated into the Editor deck 
and the reason for the change or correction. 
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The following types of corrections or changes are possible in 
the FORTRAN II System: 

1. Change existent record on the Master tape. 

If the contemplated change does not involve changing the 
first or last location which the record is to occupy in core 
storage, it is sufficient to insert; the required program 
card(s) after the last binary card (if any) following the 
Master Record. If there is a change in a record's entry 
point, or if the first or last core location is altered, then 
its Master Record card must be changed accordingly. 

NOTE: There is no Master Record card in the Editor 
deck for the special first record, 1-CS. 

2. Delete existent record on the Master tape. 

Make the first location higher than the last location on the 
appropriate Master Record card. This is most easily 
accomplished by making the last location zero. 

3. Insert a New Record. 

. Insert a New Record card, followed by the required 
program card(s), into the Editor deck where the new 
record is desired. 

4. Insert or Delete a File Mark. 

Insert or remove the corresponding End File card in the 
Editor deck. This action should not be Required in using 
FORTRAN n. 



System Tape G. The method of generating a record of the first two files of the 

Format System tape by FNEDT2, is as follows: 

1. A buffer for each record, except the special first record, 
1-CS, of files 1 and 2 is set to 0't> in cores. 

2. This buffer is then overwritten by any corresponding record 
of the Master tape (if there is a Master Record card in the 
Editor deck for that particular record) and in turn is over- 
written by any program cards following the Master or New 
Record card. 
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3. The buffer is bounded by the first and last location data 
given on a Master or New Record card. 

4. The buffer is preceded by a check sum and the 8L word of 
the Master or New Record card indicating in octal the entry 
point and the first location of the record. 

5. This buffer is .then written from cores onto the System tape 
as a record. 



Operating 
Instructions - 
FNEDT2, 
PLIB2, and 
FNDE2 



H. Upon incorporating the latest change or correction into the 

Editor deck, the following steps are executed to generate a new 
System tape. Remember that FNEDT2, PLIB2, and FNDE2 are 
within the complete Editor deck. 

1. Mount the Master tape as logical tape 5. Keep file-protected, 

2. Mount the tape, which will become the new System tape, as 
logical tape 1. Do not file -protect at this point. 

3. Ready the FORTRAN II Editor deck in the card reader. 

4. Press LOAD CARD button. 

5. Correct FINAL STOP occurs at 77777 g . 

6. File protect the new System tape on logical tape 1. This tape 
is ready for immediate FORTRAN II compilations. 



Error Halts 
in FNEDT2, 
PLIB2, and 
FNDE2 



I. Since FNEDT2, PLIB2, and FNDE2 are executed consecutively in 
generating a new System tape the following error halts are listed: 



Error Halts in 
FNEDT2 



Halt (octal): 
27 

54 



Reason for Halt: 

Card check sum 
error. 

False EOF at 
card reader. 
Should not occur 
Machine error. 



Procedure : 

Press START to accept 
information. 

Get off machine, or* try 
again from beginning of 
procedure. 



72 



Card check sum 
error 



Press START to accept 
card. 



107 



Illegal card sequence Get off machine. Correct 
in Editor deck. Editor deck. Restart 

entire program. 
20 



Halt (octal): 
176 



255 



276 



327 



Reason for Halt: 

False EOF at card 
reader. Should 
not occur. Machine 
error. 

False EOF in reading 
record from tape 5. 
Machine error. 

Redundancy or 
check sum error 
reading record 
from tape 5. 

Master or New 
Record card calls 
for record in Editor 
deck larger than 
capacity of FNEDT2 
buffer. Buffer runs 
from 353g to etid of 
memory. 



Frocedure : 

Get off machine, or 

try again from beginning 

of procedure. 



Get off machine, or try 
again from beginning of 
procedure. 

Press START to read 
tape 5 record again. 



Get off machine. Record 
be subdivided. 



Error Halt 
in PLIB2 



127 



Card check sum 
error in reading 
library subroutines 
from Editor deck. 



Press START to accept 
information. 



Error Halts 
in FNDE2 



10 



5673 



False EOF in 
loading in FNDE2. 

EOF at card reader 



Press START to read 
more cards . 

Press START to read 
more cards . 



5714 
6041 



Checksum error. 



Press START to accept 
information. 



RTT error on Halt occurs after 15 tries, 

reading Master tape. Press START to accept 

information. 



77777 



FINAL STOP, 



Writing of the new System 
tape on logical tape 1 
is complete. 
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PART 3 



Updating the General Library 



Description 
of the General 
Librarian 
Program - 
GLIB2 



J\m 



As explained previously, the third file of the System tape 
consists of the permanent library followed by the general 
library. The permanent library is, of course, never changed. 
When additions or deletions to the general library are desired, 
GLIB2 makes these changes by first duplicating files 1 and 2 of 
the System tape and the permanent library from the existent 
System tape onto the new System tape. GLIB2 then reads the 
general library from the card reader and writes it onto the 
new System tape. FNDE2 then duplicates the fourth file of 
diagnostic comments from the existent System tape onto the 
new System tape. Each general library subroutine added to 
the general library of the Editor deck by the installation must 
be in relocatable binary form and preceded by its control card. 
The format for a general library subroutine is found in the 
FORTRAN II Programmer's Manual. The specifications for 
the control card is found in PART D of this Section. 



Operating 
Instructions 
for GLIB2 and 
*NDE2 



B. The following procedure is followed when additions or deletions 
are desired in the general library: 



Error Halts in 
GLIB2 and FNDE2 



1. 

2. 

3. 

4. 
5. 



6. 
7. 
8. 

9. 



Extract GLIB2 and all succeeding cards from the existent 
Editor deck. 

Make the desired changes by adding or deleting the general 

library control and subroutine cards. 

Ready this deck in the card reader. It should consist of 

GLIB2, the updated general library, and FNDE2. 

Mount the existent System tape as logical tape 5.' 

Mount the tape, which is to be the new System tape, as 

logical tape 1. This tape is not to be file-protected at this 

point. 

Press LOAD CARD button. 

Correct FINAL STOP occurs at 77777 g . 

Restore the deck from the card reader stacker to its proper 

place in the Editor deck. 

File -protect logical tape 1. This new System tape is now 

ready for immediate object program compiling. 
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Error Halts in 
(GLIB2) 



Halt (octal): 
40 

43 
56 
62 

64 

70 

77 

102 

107. 

112 

130 

134 

136 



Reason for Halt : 

Either Tape 5 in - 
correctly written 
or machine error. 

RTT error read- 
ing tape 5. 

False EOF, machine 
error. 

Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as for 62. 



RTT error reading 
back tape 1 record. 

False EOR skip. 
Machine error. 

False EOF skip. 
Machine error . 

Checksum error. 
reading Tape 5 
record. 

RTT error reading 
tape 5 record. 

False EOF, machine 
error. 

Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as 134 



Procedure 



Restart entire program. 



Press START to try- 
again. 

Restart entire program. 



Press START to try 
again. 

Press START to try 
again. 

Press START to try 
again. 

Restart entire program. 



Restart entire program 



Press START to reread 
and recheck tape 5 
record. 

Press START to try 
again. 

* 

Restart entire program. 



Press START to 
reread and recheck 
tape 1 record. 

Press START to reread 
and recheck tape 1 recorc 
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Halt (octal): 
142 

146 



160 



173 



200 



206 



2U 



227 



233 



235 



241 



347 



Reason for Halt : 

RTT error reading 
back tape 1 record. 

RTT stop after 
having encountered 
tape 5 file tape 
marks (file 1) 

Same as 146 (file 2) 



False EOR skip. 
Machine error. 

False EOF skip. 
Machine error. 

Checksum error 

after reading 

tape 1 record (file 1) 

RTT error after 
reading Tape 1 
(file 3 ) 

False EOF. Machine 
error. 

Tape 1 record word 
fails to agree with 
tape 5 record word. 

Same as 233 



RTT error reading 
back Tape 1 record 
(file 3). 



Procedure: 

Press START to try 
again. 

Press START to recheck 
tape mark. 



Press START to recheck 
tape mark. 

Restart entire program. 



Restart entire program.' 

Press START to try 
again. , 

Press START to try again 
Restart entire program. 



Press START to reread 
and recheck tape 1 record 



Press START to reread 
and recheck tape 1 record 

Press START to try again 



Card check sum Press START to accept 

» 

error reading general information, 
library cards from the 
card reader. 
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Halt (octal): 
427 

436 

454 



Reasons for Halt : 

Incomplete 1st 
record of 1st file 
written on tape 1. 

Incomplete lst/2nd 
file record written 
on tape 1. 

Incomplete perman- 
ent library record 
written on tape 1. 



Procedure: 

Press START to try- 
again. ' 



Press START to try- 
again. 



Press START to try- 
again. 



FNDE2 



10 



5673 



5714 



6041 



False End of File 
in loading in FNDE2. 

End of File at card 
reader. 

Checksum error. 



RTT error on 
Master Tape. 



Press START to 
read more cards. 

Press START to 
read more cards. 

Press START to accept 
information. 

Halt occurs after 15 tries. 
Press START to accept 
information . 



General Library 
Control Card 
Specifications 



D. Each subroutine in the General Library consists of one or more 
control cards, followed by the subroutine proper on relocatable 
binary cards. The specifications for the control cards are as 
follows: 



Rows 



Columns 

1 

2-3 

4-18 

19-21 
22-36 



Must be punched. 

Blank 

Count of words on this card, not 
including the 9 row. 

Blank 

Blank 
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Rows 



ICol u mns 

37-72 Checksum (add-and- carry Logical) ff : 

of all words on this card except 9R. t 

.■"."'■■ ' -■'_.,$ 

1-3 Blank x '';.' 

4-18 Length of Transfer Vector. l '*; 

19-21 Blank. 

22-36 Number of words (in octal) in subroutine. ■£ 

37-57 Blank. .-./j! 

58-72 The 2's complrmiMit of the length. of 

common storage used by the subroutine. 

1-36 Contains the BCD representation of the 
name assigned to the first entry point 
(or to the subroutine if there is only 
one entry point). If the name contains 
fewer than 6 characters, each unused 
6-digit group at the right must be filled 
in with the BCD character 110000. 

37-57 Blank. 

58-72 Address, relative to. zero, associated 
with the name in columns 1-36. 



6,5,..., 1-36 If the subroutine, contains more than one 

entry point, the names assigned to the 
second, third, etc. , entry' points are v^ 
listed in these fields in order, i.e., the 
second in row 6, the third in row 5, etc. 
When all names have been listed, the re- 
maining rows are left blank. The names 
are represented as described for Row 7. 

37 Any entry point which will cause the 

specifications for a library routine to 
be met can be given a function name 
(or several names if desired). Sach 
names can be distinguished as primary. 






tft* - * v *'tz*(^ *i '' ,V A ' ^ n ""it' ' * " i * * 






Rows Columns 
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or secondary names by not prefixing;, % • $. 
or prefixing, the entry point with a > ' -. 

minus sign (i.e., a punch in col. 37 
of the appropriate row ) . The meaning 
of primary and secondary names 
arises out of the following Rule of 
precedence which is used by the 
FORTRAN II System in compiling 
library subroutines into the Object 
Program: 

RULE: When a function is mentioned in 
a Source Program, the routine which 
will be use'd is the first routine on the 
System tape which meets either of the 
following conditions: (1) The name 
mentioned is a primary name of the 
routine; or (2) The name mentioned is 
a secondary name of the routine, and at 
least one of the prima'ry names of the 
routine is also mentioned. 

Example: If the general library of the 
System tape is arranged so that the 
routines which have many secondary 
names precede the routines with few 
or none, this above stated Rule will 
prevent unnecessary duplication of 
routines in the Object Program. Suppose 
the System tape contains an arc sine 
routine which also has an entry point 
which will compute a square root, and 
that this routine is given two names, 
ASINF (primary) and SQRTF (secondary). 
Also, later on the tape is an ordinary 
square root routine with the single name 
SQRTF (primary). Then a source 
program which asks for both ASINF and 
SQRTF will cause compilation of the 
former program only. 



38-57 Blank 



^^^ 



Rows 



Columns 



58-72 The address, relative to zero, 

associated with the name in col. 1-36. 

Note: If there are more than one entry- 
point names, one or more additional 
control cards are required, containing 
the eleventh, twelfth, etc. names. 
Supplementary Control Cards must 
have row 9 punched as described above, 
and the names must start in row 8. 

The number of words (excluding common storage) contained 
in the general Hbrary subroutines along with their descrip- 
tion is included in the following table: 



No. of Words 
Name : (in decimal): Description ; 



LOG 

SIN/ 
COS 



39 
107 



Natural logarithm subroutine. 

Floating point sine and cosine 
subroutine . 



EXP 



47 



SQRT 21 

ATAN 84 

TANH 89 



Floating point exponential 
subroutine. 

Square root subroutine. 

Floating point arctangent 
subroutine. 

Floating point hyberbolic 
tangent subroutine. 
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Using the 704 FORTRAN II System 



PART 1 

On-line or 

Off-line 

Input 



Machine Operations 

A. The card input to the 704 FORTRAN II System can be on-line 
or off-line. If on-line it consists of the Source Program 
Statement cards; if off-line, it consists of a tape prepared from 
the Source Program Statements by perpherial card-to-tape 
equipment. It should be noted that in batch compiling these two 
modes of input cannot be inter-mixed. 



Tape 
Assignment 



B. 



The following tape unit assignments are to be made: 

1. Non-batch compile: 

a. Place the System tape on logical tape 1. 

b. Place the input tape on logical tape 2, if input is not cards 

c. Ready logical tapes 1, 2, 3, and 4. . , - 

Note: Logical tape 2 is always readied regardless of whether 
input is on cards or tape. 

2. Batch compile: 

a. Place the System tape on logical tape 1. 

b. Place the input tape on logical tape 5, if input is not cards 

c. Ready logical tapes 1, 2, 3, 4, 5, 6, and 7. 

Note: Logical tape 7 is not required if every Source Program 
calls for punched card output. Logical tape 5 is always 
readied regardless of whether input is cards or tape. 



Sense 
Switch 
Setting s 



C. The following Sense Switch settings are to be made for FORTRAN 
II compiling: 



Sense Switch 1 UP 



Binary cards for the object program(s) 
are punched on-line. If not batch 
compiling, tape 3 contains the binary 
program. If batch compiling, tape 3 
contains the binary program for the 
last program compiled. Tape 7 will 
contain no binary programs. 
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DOWN 



Sense Switch 2 UP 



DOWN 



Sense Switch 3 UP 



DOWN 



Sense Switch 4 UP 



DOWN 



Sense Switch 5 UP 



DOWN 



Binary cards for the output program(s) 
are not punched. Tape 3 contains 
the binary program for the last or 
only source program compiled. If 
batch compiling, tape 7 contains the 
binary programs for all the source 
programs compiled in the order they 
were compiled. 

Produces, on tape 2, two files for the 
source program compiled, containing 
the source program statements and a 
map of object program storage. If 
batch compiling, tape 6 will contain 
two files for each program compiled 
and tape 2 will contain two files for 
the last program compiled. 

Adds a third file for each program 
compiled (see above) containing the 
object program in SAP (SHARE Assem- 
bly Program) type language on tape 
2 (and tape 6, if batch compiling). 

No on-line listings are produced. 

Lists on-line the first two or three 
files of tape 2, depending on the 
setting of Sense Switch 2. 

Causes FORTRAN II to produce a 
program optimized with respect to 
index registers. 

Causes FORTRAN II to produce a 
program not fully optimized, with 
respect to index registers but which 
will be translate! more rapidly. 

Library Routines are not to be punch- 
ed out or wri-ten on tape 3. 

Causes Lilrary Routines to be punch- 
ed on-linr or written on tape 3, de- 
pending ,n whether Sense Switch 1 is 
in the > P or DOWN position. 
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Sense Switch 6 UP Single program compilation. 

DOWN Batch compilation. 

Console D. The following operations are to be performed when 704 

Operations FORTRAN II compiling: 

1. Place the Share Printer Board #2 in the on-line printer. 

2. For on-line card input, READY the Source program cards in 
the card reader. 

3 . For tape input, READY the card reader without any cards 
in the hopper. 

4. Rewind the FORTRAN II System tape on logical tape 1. 

5. Press LOAD TAPE button to begin compiling. 
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Addenda to 704 FORTRAN II Operations Manual 
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704 FORTRAN II Executive System Halts: 

SECTION REC. OCTAL STOP PROCEDURE AND DETAILS 
NUMBER. NO. LOC. SOURCE "~~ 



1-CS 



000 27 



m 



013 30 



PRE 1 



001 0147 



Successful 009 

Compilation 

Record 



35 



Source 
Program 
Error 
Record 



010 50 



Tape 1 Press START to try reading. Tape 1 (System 

Tape) again. Tape 1 has been read once 
unsuccessfully due to either Redundancy 
error or check sum error in reading in 
System record. 

Machine If not batch compiling, press START to 
error. rerun problem. If batch compile, press 

START to rerun current problem; or, turn 
on Sense Light 1 and press START if next 
problem is to be compiled. 

Program Remove cards from card reader and run out 
the cards in the reader. There is an 
impossible character (non-hollerith) in the 
3rd card from the last card in the stacker. 
Correct the invalid character before 
recompiling. 

Job Compilation is complete. All source 

Completed programs have been compiled, or an 

attempt at compilation has been abandoned 
because of source program or machine 
error. Computer control is returned to 
the installation via a load button sequence. 
If card reader is ready, but empty of cards, 
this halt results. 



Source 
cards or 
tape 5 



Compilation is complete. There has been a 
source program error if in single problem 
compile mode. This halt can also result 
if the END card in a batch compilation is 
missing or mispunched, or if tape 5 cinnot 
be read successfully. Computer control is 
returned to the installation via a load button 
sequence. If card reader is ready, bus. 
empty of cards, this halt results. 
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System Output 



ttion A. FORTRAN n compilations are terminated by successful 

.TRAN compilation or machine error stops. 

II Compilation 

1. Successful compilation. 

a. The tape and punched card output of a FORTRAN II 
compilation is given in B and C which follows. 

b. A load -button sequence for the card reader is executed. 

If the card reader is empty and the operator presses 

START, the FINAL STOP occurs at 35 Q . 

o 

2. Machine error stop. 

a. The FORTRAN II Diagnostic system is explained in 
SECTION V. 
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Tape B* FORTRAN II produces the following tape output (If Sense 

Output Switch 1 is DOWN): 

1. Non-batch compile: 

a. Logical tape 2 (for off-line printing) contains: 

File 1: Source Program 
File 2: Map of Object Program storage 
File 3: Program in SAP type language (if Sense Switch 
2 is DOWN) 

Note: The printer must be on Single or Double space 
for off-line printing. 

b. Logical tape 3 contains binary output as follows: 

Main Program consisting of: 

Program Card 

Program in Relocatable Binary 

Transfer card in Relocatable Binary ' 

or 

Subprogram consisting of: 

Program card 

Program in Relocatable Binary 

Note: The BSS Loader is not written on tape 3. Each 
tape 3 record is a card image. 

2. Batch compile: 

a. Logical tape 6 (for off-line printing) contains: 
Same as "l.a" for each program. 

b. Logical tape 7 contains binary output as follows: 

Same as "l.b" for each program (if Sense Switch 1 
is DOWN). 

Note: The BSS Loader is not written on tape 7. Each 
tape 7 record is a card image. 

33 






i .... • ... ... '...*. ..... Js,:. :* . .. .•■ .','•.. .".' 




Punched Card C. FORTRAN H, if Sense Switch 1 is UP, produces the following 

f Output punched card output: 

1. Compilation of a Main Program: 

13tiS L,oadei" ( 9 curdu) 
Program card 

Program in Relocatable Binary 
Transfer card ( 9 punch in col. 1) 

2. Compilation of' a Subprogram: 

Program card 

Program in Relocatable Binary- 
Note: The BSS Loader and the Transfer card are not 
punched out for Subprogram(s). 
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SECTION HI 



Executing the Object Program 



PART 1 

Composition 
of the Object 
Program 
Deck 



Object Program Deck 

A. The binary card output of a Main Program compilation consists 
of the following sequence of cards: 

BSS Loader ( 9 cards ) 
Program Card 

Program in Relocatable Binary 
Transfer Card ( 9 punch in col. 1 ) 

The binary card output of a SUBROUTINE or FUNCTION sub- 
program compilation consists of: 

Program Card 

Program in Relocatable Binary 

Where a permanent or general library subroutine is called, 
by a program compilation that does not suppress punching of 
subroutine cards, the subroutine card output will be: 



Preparing 
the Object 
Program Deck 
for Loading 



Program Card 

Program in Relocatable Binary 

B. In order to run the Object Program, the FORTRAN II Object 
Program deck must consist of the following sequence: 

BSS Loader 

Program Card 

Program in Relocatable Binary 

Program Card 

Program in Relocatable Binary 

Program Card 

Program in Relocatable Binary 



Transfer Card ( 9 punch in col. 1 ) 

One of the programs must be a Main Program and all the others 
subprograms. The programs may be in any order. 

The deck is readied in the card reader and the LOAD CARD 
button is pres sed. 
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1. All the subprograms called for in the Main Program and other 

subprograms must be in the deck if it is to run. Of course, they 
normally will be as a result of a compilation with Sense Switch 
5 DOWN. If any are missing, a stop at 77756 or 77775 will 

occur during loading. 

..<►■■■..'■ 

2. Although duplicate subroutines taken from the library tape will 

never occur in a single Main Program, SUBROUTINE, or FUNCTION 
compilation, they may easily occur in a Main Program - Subprogram 
sequence. If this occurs, the duplicate copies will be loaded, 
although only the first of these will ever be called during execution. 

a. To save core space during execution, the duplicate subroutines 
should be extracted from the compiled deck. This may be 
accomplished be searching for the program card that identifies 
it and removing it along with itsfibinary cards. 

1. The program card is identified by a 9 punch in column 1 
and by punching in the 8 row words. The transfer card, 
which also has a 9 punch in column 1, has no punches 
elsewhere. The program card of a subprogram is 
distinguished from the program card of a Main Program 
by not being blank in the 7 row. 

2. The physical sequence of subprograms belonging to any 
Main Program, SUBROUTINE, or FUNCTION compilation is 
the exact reverse of their appearance in that section of 

the Object Program Storage Map labelled "Subroutines 
Punched from Library." 

b. In order to save both compilation time and card searching time 
caused by duplications of library subroutines, binary card copies 
of certain of these frequently used subroutines may be kept 
aside and inserted into the load deck when needed. This would 
enable some programs to be run with Sense Switch 5 UP, which 
otherwise could not be. 

3. The transfer card must be the last card in the load deck. It is, 
however, compiled as the last card in the Main Program, and the 
Main Program may not be the last program in the deck ready for 
loading. In this case, two alternatives are available: 

a. The transfer card may simply be extracted and placed at the 
end of the complete load deck. 

b. Another transfer card ( 9 punch in col. 1 ) may be placed at 
the end of the load deck. In this case a stop at 77775 will 
occur during loading at the time the first transfer card is 
encountered. Pressing the START button* enables loading 
to continue . 
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The Control C . The Control card is used to relocate lower memory 

locations upwards in cores, and Common data 
downwards in cores. That which is referred to in 
the FORTRAN II Manual as the Common Reassignment 

otcommon ^w^ 1 "T* ?* re£erenCe °*Y *> the relocation 
of Common. When the Control card is used, it must 

be placed immediately before the program card of 
the program concerned. 
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PART 2 



Error Halts in the BSS Loader 



Error Halts 
in the BSS 
Loader 



Halt (Octal): Reason for Halt: 



Instructions and 
symbol table of 
Loader overlap. 



Procedure: 



20 
77453 

77556 
77756 



77775 



End of File in the 
card reader. 

Instructions and 
data overlap. 



Check sum error. 



More than 20 
subroutines are 
missing. 



Missing sub- 
routines. 



Terminate loading. Combination 
of program and transfer vectors 
too long. Rewrite program. 

Press START to read more cards. 



Terminate loading. Combination 
of instructions and data too long. 
Rewrite program. 

Press START to accept informa- 
tion. 

If missing subroutines are at 
hand, press START until stop 
at 77775g is reached. Follow 
instructions (a) for that stop. 

This stop indicates the TRANSFER 
CARD has been reached. It is 
caused by one of two occurrences: 

(a) Loading has been completed, 
but at least one of the subroutines 
called for is missing. Location ' 
77453 contains the BCD name of 
the first missing subroutine, 
location 77454, the second, etc. 
If the missing subroutine(s) is 
immediately available, it may 

be loaded without starting the 
entire loading process over again. 
Place another TRANSFER CARD " 
( 9 punch in col. 1 ) at the end of 
the routine(s), ready in the card 
reader and press START. 

(b) The TRANSFER CARD en- 
countered is really a premature 
one that simply has not been 
withdrawn. Be certain that a 
TRANSFER CARD is the last card 
at the end of the deck and press 
START. 
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PART 3 



Error Halts in the Object Program 



Error Halts in 
the Object 
Program 



There are 11 standard error halts in Object Program level Input- 
Output routines. They are to be recognized not by looking at the 
Instruction Counter but by looking at the HPR instruction itself 
in the Storage Register. 



Halt: 



Reason for Halt: 



HPR 0,0 End of File in reading 
binary tape. 

HPR 0, 1 End of File in reading 
cards or BCD tape. 

HPR 1,1 Inappropriate char- 

HPR 2, 1 acter encountered in 

HPR 3, 1 a data field in read- 

HPR 4, 1 ing cards or BCD tape. 

HPR 5, 1 Illegal Control Char- 
acter in FORMAT 
Statement. 

HPR 0, 2 Non-hollerith char- 
acter encountered in 
reading input cards. 



HPR 0, 3 Redundancy check in 
reading BCD tape. 

HPR 0,4 Echo check in print- 
ing. 



HPR 7, 7 Binary tape error in 
reading binary tape. 



Procedure : 

Press START to begin reading 
next file. 

Press START to begin reading 
next file. 

Pressing START causes that 
character to be treated as a 
zero. 



Press START to continue. 



Correct card, ready in the card 
reader and press START. DO NOT 
press START before correcting 
card(s). 

Press START to accept informa- 
tion read. 

Press START to continue. 
Press RESET and then START to 
repeat line and then continue. 

Press START to accept informa- 
tion read. 



Note: The error halt HPR 7, 7 in octal, as it would appear in 
the Storage Register, is shown as follows: 

042000700007 
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Additional Halts in the Object Program: 

f 



# 



If a Source Program does not end with either a PAUSE, STOP, or an IF /GO 
TO type statement, a card reader load button sequence of instructions is 
compiled as the last executable instructions in the object program. Twor 
halts, namely HPR O, 7 and HPR 1, 7, appear in this sequence of instruction*, 



The compiled instructions are as follows: 

RCD 
CPY O 
XIT * +2 

HPR O, 7 CARD READER EMPTY 

CPY 1 
XIT O 
2047D1 HPR 1, 7 CARD READER EMPTY, START BUTTON PRESSED 

TRA 2047D1 



The HPR O, 7 signals an EOF condition at the card reader. In the event 
the START button is pressed, the HPR 1, 7 occurs . 
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Permanent Library and General Diagnostic 



'ART 1 



Table and Description of the Permanent Library 

The number of words (excluding common storage) contained in the 
permanent library subroutines are included in the following table 
along with a description of their function at Object Program 
execution. 

No . of Words 
Name : (in decimal): Description: 



DBC 

CSH 

TSH 
BDC 

SCH 

SPH 

STH 
LRT 



462 
137 

21 

514 

90 

158 

12 
80 



Converts BCD to binary according to 
the Source Program input Format 
statement. 

Reads Hollerith input data cards 
from the card reader and converts 
this data to BCD. 

Reads BCD data from a BCD input 
data tape. 

Converts internal binary to BCD 
according to the Source Program 
output Format statement. 

Converts BCD to punch image and 
punches Hollerith cards on-line. 

Converts BCD to a print image and 
priats and echo-checks on-line. 

Writes BCD data on BCD output tape. 

Saves machine configuration (i. e. , 
AC overflow, etc.) upon entering 
input conversion routine and restores 
them upon exiting back to the main 
program. 



EXP(1 


34 


EXP(2 


38 


EXP(3 


100 



Exponential routines compiled by a 
Source Statement such as Y=E**X. 
One of the three routines is 
compiler depending on whether 
a fixed point ba&e - fixed point 
exporont, floating point base - 
fixed point exponent, or a 
flowing point base - floating point 
ex nnent mode, respectively, is 
sp cified in the Source Statement. 
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Note: The subroutine FIL, which controls the transmission 
of any remaining BCD output, is contained in the 
subroutine BDC. 

The subroutine LEV, which saves all indicators before 
Input-Output transmission, and the subroutine ^.TN, 
which restores all indicators after Input- Output 
transmission, are contained in the subroutine LRT. 



PART 2 

FORTRAN II 
Pseudo-Operations 



FORTRAN II Pseudo-Operations 



Two pseudo- ope ration codes, XIT and NTR, appear in the SAP 
type language listing. They are compiled purely for reasons 
internal to the FORTRAN II executive system. XIT is simply 
another way of designating the machine code TTR (0021) and 
NTR designates a TXI (1000). These are found only in 
instructions resulting from Input-Output statements. 
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, PART 3 



Description of FORTRAN II Diagnostic System 



Section I 
Diagnostic 






General 
Diagnostic 



The FORTRAN II Diagnostic may be considered as having two 
divisions -.the Section I diagnostic and ther General diagnostic. 
As an adjunct to the diagnostic, special supervisory routine records 
have been inserted into the system. 

A, This diagnostic has the purpose of detecting as many errors as 
possible on the language or syntactical level. It results from 
the statement by statement scan of the entire problem that | 
Section 1 performs, 

1. When a Source program error is detected, a print-out occurs j 
of the offending statement, together with an explanation of 

it. Section I then proceeds to its scan of the next statement. 
This means that the first error only in any one statement is 
detected. When all statements have been scanned, a stop 
occurs advising that the Section I diagnostic is now complete. 
If batch compiling, FORTRAN II will go on to the next 
problem (via the Source error diagnostic reference record 
described below). 

2. If a machine error occurs, the error print-out advises on 
how to proceed. The operator can press START to rerun 
problem or key in Sense Light 1 to go on to the next problem 
if batch compiling. If both machine and source error occur 
during Section I diagnostic there will, of course, be no 
option of re -running the program. 

B. The errors covered by the General Diagnostic, its structure 
on the system tape, and its operation are described as follows: 

1. Types of error. 

In addition to machine errors, the general diagnostic covers 
Source Program errors revealed by Sections 1' and 1" 

through Section 6 of FORTRAN II. 

*.. 

a. Section 1" is a special diagnostic routine meant to detect 
the great proportion of the source program errors not 
found by Section i. These are primarily errors arising 
from the inter -relationships among statements. Examples 
of such source program errors are transfer references \". 7 
to non-existent statement numbers, parts of the program 4 
to which there is no path of flow, and transfers to 
non-executable statements. 
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b. The source errors revealed by Sections 2 through 6 are 
primarily those arising from the exceeding of source 
program size limitations. These limitations are given 
in the section on maximum table sizes in the FORTRAN II 
Reference Manual. 

2, General diagnostic on the System tape. 

■ * 

a. An 18 word diagnostic record follows every record- 
string on the System tape. This record is the diagnostic 
call-in. A record-string is defined as a sequence of 
records which are consecutively read into cores before 
execution of any one of them begins. A record-string 
may consist of one record. 

b. The entire fourth file of the system tape is part of the 
general diagnostic. A description of the fourth file records 
is as follows: 

(1) 1st record - a short read-in record, reading in the 
second or main record. 

(2) 2nd record - the main record which determines the 
compilation stop and other necessary information 
involved. > 

(3) other records . - contain the specific comments and 
relevant table look-ups for the particular compilation 
stop. 

c. There are three records used in conjunction with the 
diagnostic. These are explained in detail in Section 

C below. In addition, there is a batch compile monitor 
record, which operates independently of the diagnostic, 
but which is sometimes used in the transfervance of 
control between these records. 

(1) The three supplementary diagnostic records are the 
Source Program Error Diagnostic Reference Record, 
the Machine Error Diagnostic Reference Record, and 
the Successful Compilation Record. These are records 
10,13, and 9 respectively in the FORTRAN II Editor 
deck. 

(2) The batch compile monitor is referred to only when in the 
batch compile mode and when it is desired to bring in the 
next program for compilation. 

(a) After determining that there is a next program, it 
transfers the program from Tape 5 to Tape 2 where 
it is ready for compilation. 
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(b) There is one Source Program error that is 

found by the batch compile monitor and this is 
any discrepancy in the END card of the final 
..... program^ . 

3. Operation of the General Diagnostic. 

a. When a machine or source error is encountered, the 
call-in record following the current record-string is 
read into cores. 



b. It reads the first 2048 words of cores onto Drum 4 
(upper cores in case of drumless versions of FORTRAN 
II) and spaces forward to the 1st record of the 4th file. 

c. This record reads in the main diagnostic record. The 
main diagnostic record prints out the title, the number 
of the stop, and the number of the FORTRAN II 
system record in which the stop occured. 

d. The main record make a table search to determine 
which of the following 4th file records contains the 
particular information pertaining to the stop. It then 
reads in that record. 

e. The particular stop record contains the error comment 
explaining the stop. In addition, it may contain program 
instructions which will be executed in order to obtain 
detailed information that will become part of the error 
comment. The error comment is then printed. 

» 

f . At this point a branching occurs, depending on whether 
error was a source or a machine error. For each of 
these cases control returns to a different point in the 
main diagnostic record and the printing occurs advising 
of the alternatives the operator may take if such alter- 
natives are available. Then the system tape is re- 
wound and spaced to the particular - source or 
machine - diagnostic reference record. 

g. The alternatives are determined in the following 
manner: 

(1) If batch compiling: 

Source program error - FORTRAN II goes on to 
the next program, if any remain. 

Machine error - Press START to rerun current 
program, or key in Sense Light 1 to go on to the 
next program. 
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(2) Not batch compiling: 

Source program error - Card reader load button 
sequence executed. Halt occurs at 50 : o» if card 
reader is empty. 






Supplementary 
Records 



Machine error - To rerun problem, key in Sense 
Light 1 and press START. 

C. The supplementary records serve two main functions. 



1. 



They are the media through which decisions are made 
and control is passed when compilation is concluded 
on any one problem or on a series of problems that 
have been batch compiled. The following information 
giving the operations of these records should be 
supplemented by Section D.l, which tells which tapes 
ar« rewound by each of the records. 

a. Successful Compilation Record '* Record 9 

This record is reached only when compilation is 
entirely completed. It executes a card reader load 
button sequence. 

(1) If batch compiling: 

(a) After successfully compiling last program, it 
is reached via the batch control monitor. 

(b) if last program is halted, because of error, it 
is reached via the appropriate error diagnostic 
reference record and the batch control monitor. 

(2) If not batch compiling, the record is reached only 
after successful compilation. 

b. Source Program Error Diagnostic Reference 
Record - Record 10 

(1) If not batch compiling - executes a card reader 
load button sequence, 

(2) If batch compiling - transfers directly to batch 
compile monitor to obtain next program. If there 
is no next program, the monitor transfers control 
to the successful compilation record. 
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{3} For certain stops during batch compilation - 

There area few stops in FORTRAN II which are 
most likely source errors, but which have some 
possibility of being machine errors. For these 
cases, the option is provided at the time of the 
stop of rerunning the problem. For this purpose, 
a test of Sense Ligjit 1 is made. If the Sense 
Light is on, the problem is rerun. 

c. Machine Error Diagnostic Reference Record - 
Record 13 

(1) If batch compiling - press START to rerun 
problem. If Sense Light 1 is on, it will go to 
the batch control monitor for the next problem. 

If there is no next problem, the monitor transfers 
control to the successful compilation record. 

(2) If not batch compiling - press START to rerun 
problem. 

2. Supervisory and special error routines may be inserted 
into these records by the installation. Insertions are 
made by means of the Editor deck. 

a. Successful Compilation Record. This record, as it 
is the very last record executed in most cases traced 
above, may be changed and added to in any desired 
manner. A symbolic listing of this record appears 
in D. 2 below. 

b. Machine and Source Program Error Records. It it is 
desired to make insertions into these records, great 
care must be exercised. Certain conditions are 
necessary for subsequent FORTRAN compilation and 
these conditions must not be altered. 
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Tape Rewind 
Chart 



Successful 
Compilation Record 
Listing 



/ 



D. The following chart indicates the tape rewinds in both batch 
and non-batch compile mode. 



Batch Compile mode : 

Section 6 rewinds tapes 2, 3, and 4. 

Batch compile monitor ^(at end of batch compiling) rewinds 
tapes 5 and 6. 

Successful Compilation record rewinds tape 1. 

Non-batch Compile mode : 

Section 6 rewinds tapes 2, 3, and 4. 

Successful Compilation record rewinds tape 1. 

Control is returned to this record ( Master Record F0090000 
in the Editor deck) at the completion of a single problem 
compilation, or at the end of batch compilation. Tape 1 is 
rewound and a load-button sequence is executed at the 
card reader. An installation may change this record to suit 
its own operating needs. 



Symbolic Listing : 



START 



SECCPY 



ORG 24 
LTM 
REW 1 
RCD 209 
CPY 

TRA SECCPY 
HTR 32767 
CPY 1 
TRA 
END 24 



Card reader load -button sequence 



Card reader empty, Halt. 
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SECTION V 



Additional Built-in Functions 
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HP 



PART 1 

Changes to 
Section I of 
FORTRAN II 
Executive 
Program 



Changes to Section 1 of FORTRAN II Executive Program ', 

Provision has been made for the addition of up to ten built-in 
functions to the FORTRAN II system by the individual installations J I 
To accomplish this, certain additions and changes are to be made ! 
to Sections I and III of the FORTRAN II system tape. 

! 'I; 

Changes in State C of Section I in the Editor deck are as follows: 

1. The name of each new routine, up to ten, is added to the ; 

dictionary beginning at location 4756 g (4 K version) or at location 
11143 o ( 8 K version ). The name consists of 3, 4, 5, or 6 alpha- 
numeric characters, omitting the terminal F used in the FOR- 
TRAN II Source language. The first character must be alpha- 
betic and must be X if the function is to be fixed point. If the 
name has fewer than 6 characters, each unused 6-digit group 
at the right must be filled in with the BCD character 110000 
(blank). The binary correction card containing this information 
is placed behind Master Record F017 ( 4 K version ) or behind 
F016A ( 8 K version ). 

2. The decrement which controls the search of the dictionary is 

changed by a binary correction card. The decrement of the TXH 
instruction at location 4266^ ( 4 K version ) or at location 10453g 
( 8 K version ) must be changed by -1 for each name added to 
the present number of built-in functions. At present, the 
decrement is the 2's complement of 20. If one more routine 
is added, for example, the decrement must be reset to the 2 f s 
complement of 21. The following shows the present TXH 
instruction for both the 4K and the 8 K versions: ■ 

4 K version: 3 77754 2 04262 '(TXH instruction at location 4266§ 

8 K version: 3 77754 2 10447 (TXH instruction at location p453 g ! 

The binary correction card containing this information is paacejd 
behind Master Record F017 ( 4 K version ) or behind Masted 
Record F016A ( 8 K version ). 
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PAR? 2 



Chang e8 to 
Section 3 of 
FORTRAN U 
Executive 
Program 




Changes to Section 3 of FORTRAN II Executive Program 



3^ 



The function of Record 55 { Block IB of Section 3 ) is to select 
the Open- subroutine desired and subsequently transfer to the 
specific routine needed to compile instructions for the object 
program. This routine can be written by the individual in- , 
stallation in the form required by Section 3. A listing of 
Record 55 is included in Part IV of this Section of the Manual* 
to serve as a reference for writing arid including new routines. 
Two new routines, DIM and XDIM, have been added by means 
of Record 55 and will serve as an example for the installation. 
These routines begin at location 7170g in the listing. 






Changes to Record 55 are as follows: .j 

* "i 

1. The name(s) of each routine added, up to ten, is added to 
the dictionary beginning at 7124g. The format of the name(s) 
must be exactly as used for State C of Section 1 in the Editor 
deckv 

2. The decrement which controls the search of the dictionary must 
be changed. If done in binary, the correction must be made to 
the TXH instruction at 7G77g. The decrement is the 2's com- 
plement of the number of names which appear in the dictionary 
(M1D2). At present, the decrement is the Z % s complement of 

2. If the routine is changed symbolically, the symbol M1D2L* 
used for the decrement of thu TXH instruction at 7077o must be 
defined. This would appear in the constant area, beginning 
at 7230 8 . An example wn::ld be: M1D2L EQU -K, where K 
depends on. the -number of names which' appear in the dictionary, 

3. Beginning at 7U0g, a s^nef- of TRA instructions are to be in- 
cluded for each routine that, in :cUieri, These instructions must 
be in the same ss queue c 'is the names appear in the dictionary. 
The TRA address should bo to either the octal location where 
the specific routine for compiling appears, or, if done symbol- 
ically, it should be the symbolic name of the routine. 



4, The locations be; 



7240 



the additional routines which will 
necessary. The operation codes 
ments of the CIT specifications. 
are typical examples. These twe 
the use of Sense Switch 4, which 
itional routines. The comments 
actly what is intended by each of 
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compile the actual instructions 
used must meet the require- 
The XDIM and the DIM routines 
, routines have been combined by 
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5. Each new routine added must include: 

a. A TSX 7146 8 , 4 (007400407146) to test the number of 
arguments specified. 

b. A TSX 7154 8 , 4 (007400407154), which will determine 
the nature "of the first argument and subsequently prepare 
the compiling locations of the calling sequence to the CIT 
routine. These locations will then include all necessary 
addresses, tags, etc. 

c. A TXI 7174 8,1, -4 (177774107174) in order to update the 
input AIL. buffer. 

d. A TSX 7136 8 , 4 (074004 07136) in order to determine if at I 
the end of an AIL. block and if so, make the necessary 
adjustments, 

6. If there should be exactly two arguments specified, a TSX 
7152 8 ,4 (007400407152) will perform this test. Also, a TSX 
7154 8 ,4 (007400407154) must be included again in order to 
determine the nature of the second argument and make the 
necessary adjustments. This, however, must be done after 
an instruction utilizing the first argument has been compiled. 

7. If there are more than two arguments defined, a repetition 

of steps 1-5 can be performed. Exclude a check for the second 
argument, since, in this case, the check is riot valid. 

8. After all input tests have been coded, the instructions which 
follow should be a TSX 707 8 , 4 (007400400707), followed by 4 
parameters (for each instructions of the added routine) which 
the CIT routine of the system proper requires in determining 
the compiled instruction necessary to the CIT format. The 
initial instructions, concerning the arguments, will have their 
parameters initialized by the routine beginning at 7154o 
(called ARGTAG). All other instructions will generally con- 
tain a zero for the first parameter, an operation code (XXX) 
for the second parameter and zeroes for the third and fourth 
parameters. However, in the case of transfer type instructions, 
an * * K is given in the third and fourth parameters to obtain 
the proper transfer address. A (17) 8 in bits S-5 of the third 
parameter defines the symbolic address as an *, and a t K in 
the address of the fourth parameter will either increment or 
decrement the *. 
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9. The last instruction in the new routine added must be a TXI 
774g, 1. -4(177774100774), This will restore proper linkage 
with the main program. 

10.' All constants, which are required by the added routine, and not 
presently included, must be added along with the specific 
routine, 

11. If corrections are made in binary, they must be placed behind . 
Master Record 55 in the Editor deck. If symbolic corrections 
are made, the record must be reassembled, and will replace 
the present Record 55 on the system tape. However, there will 
be no need to change the Master Record card for Record 55. 
Merely place the new binary cards behind the Master Record 
card. 

12, The built-in function DIMF (Arg ]r Arg 2 ), which has served as 
an example, is defined aa Arg! - Min (Argp Arg 2 ). 

An example of use in a Source Program is as follows: 

READ 2, A, B 
BIGXS DIMF (A,B) 
PRINT 2, BIGX 
2 FORMAT ( 2D12.4) 
STOP 

The four instructions compiled in calling for DIMF in the 
above example, as they would appear in an. actual SAP-type 
listing of a main program, are shown below: 



4A 



KsJljA. A 

FSB B 
TPL *-t-2 
PXD 
STO BIGX 



(1st instruction of DIM) 
(2nd instruction of DIM) 
(3rd instruction of DIM) 
(4th instruction of DIM) 
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PART 3 



Description 
of FORTRAN 
II CIT Format 



The FORTRAN II CIT (Compiled-Instruction-Table) format 
consists of 4 words for each compiled instruction. The format 
for each of these words are shown in the following tables: 



1 - 2 



Word 1: 



17 18-20 21 



32 33 - 35 







1 1 .. 1. 11 .11 1 

Internal Formula Number 
(IFN) in binary, right- 
adjusted 




Instruction Number 
within IFN. In bi- * 
nary and right-adjusted 





The S bit of word 1 is a minus if instruction pertains to a open 
subroutine. 



Word 2: 



17 18 - 20 21 



Operation Code in BCD 



35 



Decrement, in binary and right-adjusted. 



Word 3: 



35 



Symbolic address in BCD. 



The symbolic address in word 3 can consist of one of the 
following forms: 

1. If the address utilizes 6 BCD characters, it occupies the 
full Word, 

2. If the address is less than 6 BCD characters, it is terminated 
by a BCD blank character (110000): 
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Examples: 
S 35 


S 






35 


ABCDEF 
ABCDEb 
ABCbOO 

IbOOOO 

ii i 


(21 122 


23 


24 j 25)26 


J21 22 


23 


24 j 25 


60 


21 22 


23 


60 j 00 


00 


31 60 


00 


00 1 00 


00 



3. Special address "signal: 

A (17g) in bits S-5 defines the symbolic address as an *, 
such as the case of the TPL * + 2 in DIM. 



Word 4: 



1 - 2 



17 



18-23 24 



35 



Addend portion of Symbolic 
address or absolute address, 
binary, and right -adjusted 



Symbolic tag appears as a binary 

number. 



in 



The S bit of word 4 is plus if there is an addend in the decrement, 
and minus if there is a subtrahend in the decrement. 
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•^r 1 ^-*: 



l«i 



%^;^0^lf> 









PART 4 

Listing of 
Record 55 



Listing of Record 55 

The SAP listing of Record 55 is as follows: 
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<* ', : i:w^: ><:. 









07071 
07072 
07073 
0707* 
07075 
07076 
07077 
07100 
07101 
07102 
07103 
0710* 
07105 
07106 
07107 
07110 
07111 
07112 
07113 
0711V 
07115 
07116 
07117 
07120 
07121 



07122 
07123 
0712* 
07125 
07126 
07127 
07130 
07131 
07132 
07133 
0713* 
07135 



2 00001 
-0 53*00 

3^000 
77777 
02000 
77777 
77776 
07^00 
63*00 
77776 
07*00 
5 3400 
02000 
02000 
020O0 

00000 

OOOOu 
00000 
00000 

00000 

coo 00 

00000 
00000 

00000 
oocoo 



1 



1 

3 



-0 

1 


-0 














07071 



* 01306 

* 02170 

* 07122 

* 07077 
071U1 

* 07077 
7073 
0000* 
02312 
07103 
7136 
02312 

* 07106 
07170 

e c mi 

c 

OOOuu 

u OOOwU 

C «j -v 

OOwOO 

coooo 
oocoo 

QQO-jQ 

00000 

00000 



67i*31<**6060 
2*31**606060 
OOOuO OOOOv 
00000 COCOO 

00000 oocoo 
00000 00000 
00000 00000 
00000 .00 000' 
00000 OOwJJ 
00000 00000 
COOOO 00000 
00000 00000 



07136 -0 63*00 

07137 -0 75*00 



07230 

oouoo 



071*0 3*000 02305 

071*1 02000 * QQQJl 

071*2 07*00 * 003*1 

071*3 07*00 * 00004 

071** -0 !>3*00 * 07230 
071*5 02000 * 00001 



0P1 

0P2 

QP3 

OP* 



M1D2 



TEST 



ORG 



TIX 

LXD 
CAS 

TXI 
TRA 
TXI 
TXri 

TSX 
5X0 
TXI 
TSX 
LXD 
TRA 
TRA 
TRA 
HTR 
H7k 
HTR 
HTR 
HTR 
HTR 
HTR 
HTR 
hTR 
HTR 



36*1 

MASTER RECORD CARD * FN055 
ROUTINE TO HANDLE ADDITIONAL SUBROUTINES if DESIRED 

M13505#*tl COMPARE MID FOR PRESENT SUBROUTINES 

EtOJt* COMPARE ADD IT» OPEN SUdS» IN M.U2 

M102»* WITH CURRENT NAME. 

0P2.*.-1 NOT FOUND. GET NEXT M1D2 ENTRY 

0P3 FOUND 

0P2»^»-1 NOT FOUND* GET NEXT M1D2 ENTRY. 

GPl.*.(-UD2L TEST FUR END OF M1D2. 

*•<► CURRENT SUtt NOT IN M1D2 

CCELL.* SAVE IRC FOR LATER dRANCn OF SAME INST. 

0P3 + <i.i»~2 INDEX TO GET NEXT * huRu INSTk. 

TEST** TEST FOR END UF CUR. COMPAIL RtC. 

CCtLL»* GO TO THE COMPILER FUR PART. SUeRoJTlNE 

OP*+i.* COMPAIL" INSTRUCTION 

XDIM OPEN SUB IS XDIM 

DIM OPEN SUB IS DIM 

SPACE FOR BRANCHING TO 10 AuuITIunAl. 
OPEN SUBROUTINES TnE LIST uF TKANSrtRa 
TO ADDITIONAL OPEN SUdS MOOT ct wKytn- 
ED IN THE SAME WAY AS THE ADOITIu-.al ur- £ ;» 
SUB NAMES ARE ORDERtO IN Tnt DRTivU- 
ARY M1D2. 



SCO 
BCD 
HTR 
HTR 
HTR 
rtT-R 
HTR 
HTR 
HTR 
HTR 
HTR 
HTR 



SXD 
PXD 
CAS 
TRA 
TSX 
TSX 



THE DICTIONARY FOR ADDITIONAL OPEN SUBROUT INE* » AND 
CONSTANT^ USciO IN THE DISCRIMINATION PROCEDURE. 
1X0IM OPEN SUB XDIM 

1D1M OPEN SUB DIM 

SPACE FOR ADDING 10 ADDITIONAL OPtN ^OBi. 



FOUR SOoROUTlNES USED IN COMPILING OPEN 6U6R0UTINE5 
l.TEST 

SAVE LINKAGE 

COMPARE CURRENT VALUE OF IR1 WITH 

2$ COMPL. OF WORD COUNT. 



C»* 

0.1 

MlALwN 

It* 

M10210.A 

u ** 



LXD 
TRA 



C»* 

1.* 



CURRENT RECORD EXHAUSTED 

STOP. NO OF WOS. IN CUR REC EXLcE^S «0. 

COUNT 

RESTORE LINKAGE 

RETURN 



071*6 50000 1 02327 TEARGI CLA AIL.l 



2 TEARGI. ROUTINE TO DtT. IF TOO FEW ARbS SPECIFIED 



TEST FOR ALL ONES IN 1ST WD OF CUR. INSTR 



F3B12ioO 
F3di21*Q 
F3ol2200 
F3B1221Q 
F3ol222Q 
F3B12230. 
F3ai22*0 
F3oi2250 
F3B12260 
F.»d*227« 

F3dl<:2*0 
r 3alZ2QV 
F3B12310 
Fidi^J^O 

F 3a 12 3*0 

f Jolii^O 

(■ Jwi*iJ?i3 ' 
F i i c 3 a 0<- 
F3di^3>0v 
F3B12*00 
F3B12*10 
F3B12*20 
F3B12*30 
F JOiittu 

FibiihOU 

F3B12460 

FJB12*70 

r Jui*:*aC 

Fidi2*^0 

F3dl2i»00 

F3B1251C 

F3B12S20 

F3B12i)30 

F3B125*Q 

F3B12550 

F3B12560 

F3B12&70 

Fibl4>dO 

F3B125^0 

F3&I26QQ 

F3dl26lQ 

F3B12620 

F3til2630 

F3B126*0 

F3bl26:>0 

P3bi26oO 

F3B12670 

FJB12630 

FJB126*0 

F3c>12700 



0£i 
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?.■-. ■ »- ; 



^gf^V^f- ■ f' 



07U7 40200 02211 
©7150 iOOOO 02l5t» 
07151 02000 4 00001 



'■■* 






! t^t 




07152 
07153 
0715* 
07155 
07156 
07157 
07160 
07161 
07162 
071O3 
0716* 
07165 
07166 
07167 

Q7i?u 
C?l?i 
07i72 
07173 
w*7 1?* 
0717? 
07176 
07177 
*> ?20'C 

0? 6 -03 

7 204- 

07 205 

072^0o 

720? 

7 2AO 

07211 

07212 

07 213 

0721* 

07215 

07216 

07217 

07220 

07221 

07222 

07223 

0722* 

07225 

07226 

07227 















500 00 

02000 
50000 
60100 

5C0OO 

6G1OO 

32v*=C 

1CD00 

-Q 634*30 

-0 7o000 

Cl^OC 

7o^00 

~0 >3-.= y0 

OivO'J 



1 02327 

G 07233 
1 ~?33l 
02324 

i C2332 
O 023^5 
u «-2.:J7 
4 GC-Oul 
4 072 30 
0O 143 
4 01-: 16 
© 002^3 



76000 001*4 

O7-*»O0 4- G*?l4t- 

v '4'- V *» U / i >i.; 

0C,0v ■,- 0„'jj.' 

i. u ... w u J 2 2 i 5 

'-■- -0 - 02 3. - 

i.- W . C-i.- J U i 3 i. 2 

V > '~^j\k^ ** ;-V ) i 5.4. :'■ 



-0 



0' ocr gq,-c 
c oc:-oo i, 
t,c:, ; o _> 

v OE..0O j 
C f.-7,0C a 
C C j •.' (.' 

c;:-cc y 

GC2G 1 ^ 
CGjOC 

0740 v *» 
00 2 00 

00O00 U 

000 CO 

00 coo . 

1 7 7 774 1 



C-2 170 
2 J2h 



. V'- ' w ' 
<-'2i7u 
7233 
U-22h5 
02: 77 
'00 70 7 
v 2 1 * 
7234 
02170- 
O2170 
00774 



TEAR02 

ARG? so 



XOP 
DIM 



07230 00000 00000 C 



SU8 
TZE 
TRA 

CLA 
TRA 
CLA 
STG 
CLA 
STO 
ANA 
TZE 
SX0 
MSE 
TSX 
PSfc 
LXD 
TRA 

PS£ 
TSX 
TSx 
TXl 
TSX 

fix 

7 OX 

HTR 

htr 
htp 

TSa 

CAL 

Kifc 



ALLONE 

ERROR! 

1»4 

3 TEARG2. 

AIL.1 
SUSPaT 
AIL+2.1 
MiC«r + 2 

A1j_ + 3»I 

>ac«+3 

TuMSk 
X *•* 

C*4 

>'I25C0#*. 

V s 

C»4 
i t4 

The 
10 

T£ 



ALL ONES. 00 TO PROPER STOP 
NOT ALL ONES* RETURN 
ROUTINE TO OET. If TOO MANY ARGS. SPECIF IcO 
TEST FOR ALL ONES IN TST WORD OF 



CURRENT ARG 
TAG OF cUfct- 



E KOUTu.t FOR 



i » ** 
ARG T- AG j 4 * 
C'l *.] » -4 
Tfc.iTi4-_. 
TEssG2 ♦ * ■ 
<L'*T30i4 
M1CW-- 
L i CLA 5 



PLACE SUMtt ADDRESS OF 
IN H1CW+2 

PLACE RELATlVt AOU. ANU 
RENT ARG» IN M1CW>3 
TEST FUR TAO 
NO TAG'* RETURN 
ARG TAoGEu. SAVfc LIN^AuE 
TEST. FOR END OF CHTAo TAdw- 
CHTAG TAdLE NOT fcArtAUSTiO, 
ENO OF CHTAG TAoLt. Kt^TUK- 
01 CAT OR AH J LINKAGE 
RETURN 
COMPILING THc OPEN SJtSROU.T IuES wK'.A.«0 XjiM 
TURN ON S-cNSL LlUriT 100 FOn X^IK 
TEST NO. OF ARGS SPtCIFIED 
TEST WriETHtR FiHST AHG. IS TaOvLj 
INOEX COrtPAiL RECOKO T-j -CktG. Of .N&XT r-.^'_, 
TEST FOR £ND UF CUkhtuT Ai- Hi. r- _ 
TEST HO, OF ARGS. .SPECIF leu 



IN- 






CT 



L < Swo ) 
i O 



SL*» 
?SX 
m'R 
HTK 
hTP 
HTS 
TSX 

htr 

HTR 

HTR 

HTR* 

TSX 

HTR 

HTR 

HTR 

HTR 

TXI 



HTR 



> D i 

C 1 7 Q C * ** 
L* 0) 

m:c*+i 

H i C 4 + 2 

MIC.v+3 

C I 7 00-»'.4 

L(0> 

LtTHLJ 

L(017) 

LI20I 

CHOC.'* 

L(0) 

L(PXDJ 

L ( ) 

L(C) 

RESUME*! 1-4 



COMPILE FI*6T 
LOCATION {1ST 

CLA C2N0 WD« J 

FIRST ARG "<3RD WO -t 

REL. A0i> ENO FAG OF 1ST A^ 

TEST *Mc'TrttR 2N0» hRG Ta-j( 

PREPARE OP, WO (2ND WO) Qi 

ENTRf. OP t IS S06. FOR X^. 

FSd for 01 m 



A'N*. Xw i . 



a (4T'h <»U ) 

."0 :TC. 
2hu Ml . 



'INST FOR viM L-R Xjl f < 
12N0» WO) 

2NL» ARC (4Th *D} 
DIM ANO XOxtA 



COMPILE ZHd 

1 1ST W0> 

SUB(X0IM)» FSbtOIM) 

2ND. ARG «3R0- WD) 

REL» ADD ANO TAo OF 

COMPILE 3RD INST FOR 

OUST WOJ 

TPLI2ND WD) 

OCTt 17 IN tilTS S-5 

REL. ADO It TAG I4TH WO) 

COMPILE LAST INST FOR DIM ANU XDIM 

I1STWD) 

PXD UNO WO) 

(3RD WD) 

C4TH WDI 

INDEX CUR AIL RECORD TO bEGINNING 

OF NEXT 6WD INST ANO RETURN To MAIN 
CONSTANTS AND ERASI8LE STORAGE FOR FOUR 
SUBROUTINES USED IN COMPJUNo OPEN SUoROUTlNES 
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PROG 



F3312710 

Fiol2720 

F3812730 

F3u127h0 

F3di2750 

F3t3l276d 

F3ai2'??0 

F3rfi27il0 

F3fci27>0 

F3612600* 

F3B12tolO 

F 31^2620^ 

Fjt,i2o>2^ 

Fjal2d#4 S -' 
FJOi26fr^---- 

~~F3ii*2doJ 
F3tl2o7w ' 
F j o 1 2 6 a 
. f £z- *-*G'j ■ 
F-3o1<.»0j 
F3ui*vi0 *V 
F^tii^^iG ..- 
F2^12Vj» 
Fiv> -.2>«'J -' ; 
r jri 2' -V 2 C " , 
Fjs*i*fcG 
rjci2»70 

" F^ol^Vdw 

Fj j*iC2'L"- 
.."F3e* 30JG 
Fi;-,iJj43 
FjoiiOsO 
Fjui3 0a0 
Fi^*^070 
F JciJwaw 
F3bi30*w 
F^di3100 
>3oi31l0 
F3S13120 
F3B13130 
Fiol3140 
F3B13130 
F3oi3160 
F^3dlii79 . 
FiciiJld'U- 
F3dl31V0^ 
FJd13^0(9«» ' 
F3b<i32l6 
F3ol324A 

F3tJlJ2^ 

F3t»l32% . 



aft 



v •■„.'*' 



y. ....5- ^ 



, -' *\^f»! 






# 



a 



07231 
07232 
07233 
07234 



07235 
07236 
0723? 
$7240 



626*220 
266222 

634 7430 
476 7240 



4G?00 
10000 
02000 

ouooo 



00000 
00 v 0.0 
C - 

ooooo 

'02245 
02177 

00 7 74. 
C C22H 
4 00301' 
02163 

tiO'^wO 

07071 



The is compl of the length of fsbi>36Q 

Ml 02. THIS CARD MUST ot CHANGcu WHkh F301S27O 
ADDITIONS TO Ml£>2 ARE MADE F3»i3*«0 

L(0J SYN 1144 F1M9290 

M13505 SYN 710 FH1»2?1 

CCELL SYN 1226 F3&13292 

M1ALWN SYN 1221 F»»1339» 

M10210 SYN 225 F381329* 

AIL SYN 1239 F3B132*5 

ALLONESYN 1161 F3B13300 

ERRQR1 SYN 1133 9 3319301 

ERR0R2 SYN 1139 F3B13302 

MIC* SYN 12 34 F3bZ334» 

TGMSK. SYN 1159 F3bl33#* 

M12500 SYN 526 F»bUF3ttfr- 

CONSTANS USED IN COMPILING THE OPEN SubRTNS. XD1M ANO DIM F3toi33lQ 

CI TOO SYN 455 F381332Q 

LICL'A)- SYN 1165 F3B13330 

LC SUB} BCD 1SL80OO F3813340 

LiFSBJ BCD IFSBOOO' F3B13350 

LfTPL) 6CP iTPLOOO F3fal33»0 

fefPXD) BCD 1PXDO0C F3B13370* 

L«017J SYN 11S9. F53133B0 

SYN 1151 f 3613390 

SYN' 5 08 F3B13400 •■ 

SOfePAT SUB ALLONE F3813401 

TZE 1»4 ' F3B13402 

TRA ERRCR2 F3B13403 
HTR SPACE FROM ROOM MAY BE USED FOR ADD. OPEN SUB. COMPILATION F3»134l4 
ENO 3641 



77776 M102L EOU -2 



02170 
01306 
02312 
02305 
00341 
02327 
02211 
02155 
02163 
02322 
022Q7 
01016 

00707 
02215 



LI20J 

RESUME 



ROC?- 



.* , 
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